(Flogb): Fix arg names. Don't confuse Lisp_Object with integer.

diff --git a/src/floatfns.c b/src/floatfns.c
index fb6030f69e33d798fc068510fe3bc0ef1f613c71..1235dad2f8651e8f778a5e6c0f9d8b6bb5717cb4 100644 (file)
--- a/src/floatfns.c
+++ b/src/floatfns.c
@@ -624,10 +624,11 @@ This is the same as the exponent of a float.")
   error ("SYSV apparently doesn't have a logb function; what to do?");
 #else
   Lisp_Object val;
-  double f = extract_float (num);
+  int value;
+  double f = extract_float (arg);
 
-  IN_FLOAT (val = logb (f), "logb", num);
-  XSET (val, Lisp_Int, val);
+  IN_FLOAT (value = logb (f), "logb", arg);
+  XSET (val, Lisp_Int, value);
   return val;
 #endif
 }